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Problem 

There have been several customers encountering error code 5 in the invoice 
section of the program and also in End-o£-Period processing. 


Solution 

The problem is corrected by following the steps listed below. 

1. Backup the diskette(s) and make the changes on the Backup copy of the 
program. 

2. In BASIC load the program by typing LOAD"APINVCE/BAS". 

3. Make the following corrections: 

CHANGES (Retype the line or refer to the Edit section of the owners manual) 

Old Line: 350 N#=VAL(IN$):W#=ABS(N#)*100:V$«" ":X-W#/D1#:W#»W#-X*D1#: 
V$-V$+CHR$(X-(N#<0)*128):X-W#/D2#:W#-W#-X*D2#:V$-V$+CHR$(X): 

X^#/D3#:W#»W#-X*D3# :y$-V$+CHR$ ( X)+CHR$ (W#) : RETURN 

New Line: 350 N#-VAL(IN$):W#»ABS(N#)*100-<-. 1 :X-W»/D1»:W#-W»-X*D1#: 

V$-CHR$(X-(N#<0)*128):X-W#/D2#:W#=W#-X*D2#:V$-V$+CHR$(X):X-W#/D3#: 
W#»W#-X*D3#:V$-V$+CHR$(X)+CHR$(W#):RETURN 


4. Type SAVE"APINVCE/BAS" to save the changes in the program. 
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5. Load Che program by typing LOAD"APPROC/BAS". 

CHANGES (Retype the line or refer to Che Edit section of the owner's 
manual) 

Old Line; 800 W#-ABS(N#)*100:V$="":X-W#/D1#:W#=W#-X*D1#; 

V$=V$+CHR$(X-(N#<0)*128):X=W#/D2#:W#-W#-X*D2#:V$-V$+CHR$(X): 
X>“W#/D3#:W#»W#-X*D3#;V$-V$+CHR$(X)+CHR$(W#) :RETURN 
New Line: 800 W#-ABS(N#)*100+.l ;X=-W#/D1#:W#»W#-X*D1#; 

V$-CHR$(X-(N#<0)*128):X»W#/D2#:W#-W#-X*D2#:V$-V$+CHR$(X):X-W#/D3#: 
W#-W#-X*D3#:V$-V$+CHR$(X)+CHR$(W#):RETURN 

6. Type SAVE"APPROC/BAS" Co save Che changes in the program. 

7. Load the program by typing LOAD"APCHECKS/BAS’'. 

CHANGES (Retype the line or refer to Che Edit section of Che owner's 
manual) 

Old Line: 700 W#»ABS(N#)*100:V$“"":X»FIX(W#/D1#):W#»W#-X*D1#: 
V$»V$+CHR$(X-(N#<0)*128) 

New Line; 700 W#=ABS(N#)*100+.l:X*W#/Dl#:WlNW#-X*Dl#: 

V$-CHR$(X-(N#<0)*128):X-W#/D2#:W#=W#-X*D2#:V$=V$+CHR$(X): 
X=^#/D3#:W#-W#-X*D3#:V$-V$+CHR$(X)+CHR$(W#):RETURN 

DELETIONS (Type Che line number and press <ENTER>) 


8. Type SAVE"APCHECKS/BAS" to save Che changes in Che program. 

9. Load the program by typing LOAD"APPOST/BAS". 

CHANGES (Retype Che line or refer to Che Edit section of Che owner's 
manual) 

Old Line; 350 W#»ABS(N#)*100:V$="":X-W#/D1#:W#=W#-X*D1#: 

V$=V$+CHR$(X-(N#<0)*128):XaW#/D2#;W#»W#-X*D2#:V$»V$+CHR$(X): 
X»W#/D3#:W#»W#-X*D3#;V$»V$+CHR$(X)+CHR$(W#):RETURN 
New Line: 350 W#-ABS(N#)*100+.1:X-W#/D1#:W#-W#-X*D1#; 

V$=CHR$(X-(N#<0)*128):X^/#7d2#;W#»W#-X*D2#:V$“V$+CHR$(X): 
X»W#/D3#:W#-W#-X*D3#:V$»V$+CHR$(X)+CHR$(W#):RETURN 

10. Type SAVE"APP0ST/BAS" Co save Che changes in Che program. 

11. At TRSDOS Ready, make a backup copy of Che corrected diskette. 








